home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / lamstex / inputs / book.stt < prev    next >
Text File  |  1991-09-06  |  5KB  |  163 lines
  1. \catcode`\@=11
  2. \let\alloc@\alloc@@
  3.  
  4. \hsize=29pc
  5. \vsize=40pc
  6. \normallineskiplimit=1pt
  7. \parindent=10pt
  8.  
  9. \font\ninerm=cmr9
  10. \font\eightrm=cmr8
  11. \font\sixrm=cmr6
  12. \font\eighti=cmmi8   \skewchar\eighti='177
  13. \font\sixi=cmmi6     \skewchar\sixi='177
  14. \font\ninesy=cmsy9   \skewchar\ninesy='60
  15. \font\eightsy=cmsy8  \skewchar\eightsy='60
  16. \font\sixsy=cmsy6    \skewchar\sixsy='60
  17. \font\eightbf=cmbx8
  18. \font\sixbf=cmbx6
  19. \font\eightit=cmti8
  20. \font\eightsl=cmsl8
  21. \font\eighttt=cmtt8
  22.  
  23. \ifmsamloaded@
  24.  \font\eightmsa=msam8
  25.  \font\sixmsa=msam6
  26. \fi
  27.  
  28. \ifmsbmloaded@
  29.  \font\eightmsb=msbm8
  30.  \font\sixmsb=msbm6
  31. \fi
  32.  
  33. \ifeufmloaded@
  34.  \font\eighteufm=eufm8
  35.  \font\sixeufm=eufm6
  36. \fi
  37.  
  38. \ifcmmibloaded@
  39.  \font\eightcmmib=cmmib8 \skewchar\eightcmmib='177
  40.  \font\sixcmmib=cmmib6 \skewchar\sixcmmib='177
  41. \fi
  42.  
  43. \ifcmbsyloaded@
  44.  \font\eightcmbsy=cmbsy8 \skewchar\eightcmbsy='60
  45.  \font\sixcmbsy=cmbsy6 \skewchar\sixcmbsy='60
  46. \fi
  47.  
  48. \newskip\ttglue@
  49.  
  50. \def\tenpoint{\def\pointsize@{10}%
  51.  \normalbaselineskip12\p@
  52.  \abovedisplayskip12\p@ plus3\p@ minus9\p@
  53.  \belowdisplayskip12\p@ plus3\p@ minus9\p@
  54.  \abovedisplayshortskip\z@ plus3\p@
  55.  \belowdisplayshortskip7\p@ plus3\p@ minus4\p@
  56.  \textonlyfont@\rm\tenrm
  57.  \textonlyfont@\it\tenit
  58.  \textonlyfont@\sl\tensl
  59.  \textonlyfont@\bf\tenbf
  60.  \let\big\tenbig@
  61.  \textfont\z@\tenrm  \scriptfont\z@\sevenrm  \scriptscriptfont\z@\fiverm
  62.  \textfont\@ne\teni  \scriptfont\@ne\seveni  \scriptscriptfont\@ne\fivei
  63.  \textfont\tw@\tensy \scriptfont\tw@\sevensy \scriptscriptfont\tw@\fivesy
  64.  \textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
  65.  \textfont\itfam\tenit
  66.  \textfont\slfam\tensl
  67.  \textfont\bffam\tenbf \scriptfont\bffam\sevenbf
  68.   \scriptscriptfont\bffam\fivebf
  69.  \ifmsamloaded@
  70.   \textfont\msafam=\tenmsa \scriptfont\msafam=\sevenmsa
  71.    \scriptscriptfont\msafam=\fivemsa
  72.  \fi
  73.  \ifmsbmloaded@
  74.   \textfont\msbfam=\tenmsb \scriptfont\msbfam=\sevenmsb
  75.    \scriptscriptfont\msbfam=\fivemsb
  76.  \fi
  77.  \ifeufmloaded@
  78.   \textfont\eufmfam=\teneufm \scriptfont\eufmfam=\seveneufm
  79.    \scriptscriptfont\eufmfam=\fiveeufm
  80.  \fi
  81.  \ifcmmibloaded@
  82.   \textfont\cmmibfam=\tencmmib \scriptfont\cmmibfam=\sevencmmib
  83.    \scriptscriptfont\cmmibfam=\fivecmmib
  84.  \fi
  85.  \ifcmbsyloaded@
  86.   \textfont\cmbsyfam=\tencmbsy \scriptfont\cmbsyfam=\sevencmbsy
  87.    \scriptscriptfont\cmbsyfam=\fivecmbsy
  88.  \fi
  89.  \let\tt\tentt
  90.  \tt\ttglue@=.5emminus.15em
  91.  \setbox\strutbox\hbox{\vrule\height8.5\p@\depth3.5\p@\width\z@}%
  92.  \setbox\strutbox@\hbox{\vrule\height8\p@\depth3\p@\width\z@}%
  93.  \ex@.2326ex\normalbaselines\ifmmode\else\rm\fi}
  94.  
  95. \def\tenbig@#1{{\hbox{$\left#1\vbox to8.5\p@{}\right.\n@space$}}}
  96.  
  97. \def\eightpoint{\def\pointsize@{8}%
  98.  \normalbaselineskip10\p@
  99.  \abovedisplayskip10\p@ plus2.4\p@ minus7.2\p@
  100.  \belowdisplayskip10\p@ plus2.4\p@ minus7.2\p@
  101.  \abovedisplayshortskip\z@ plus2.4\p@
  102.  \belowdisplayshortskip5.6\p@ plus2.4\p@ minus3.2\p@
  103.  \textonlyfont@\rm\eightrm
  104.  \textonlyfont@\it\eightit
  105.  \textonlyfont@\sl\eightsl
  106.  \textonlyfont@\bf\eightbf
  107.  \let\big\eightbig@
  108.  \textfont\z@\eightrm \scriptfont\z@\sixrm  \scriptscriptfont\z@\fiverm
  109.  \textfont\@ne\eighti \scriptfont\@ne\sixi  \scriptscriptfont\@ne\fivei
  110.  \textfont\tw@\eightsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\fivesy
  111.  \textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
  112.  \textfont\itfam\eightit
  113.  \textfont\slfam\eightsl
  114.  \textfont\bffam\eightbf \scriptfont\bffam\sixbf
  115.   \scriptscriptfont\bffam\fivebf
  116.  \ifmsamloaded@
  117.   \textfont\msafam=\eightmsa \scriptfont\msafam=\sixmsa
  118.    \scriptscriptfont\msafam=\fivemsa
  119.  \fi
  120.  \ifmsbmloaded@
  121.   \textfont\msbfam=\eightmsb \scriptfont\msbfam=\sixmsb
  122.    \scriptscriptfont\msbfam=\fivemsb
  123.  \fi
  124.  \ifeufmloaded@
  125.   \textfont\eufmfam=\eighteufm \scriptfont\eufmfam=\sixeufm
  126.    \scriptscriptfont\eufmfam=\fiveeufm
  127.  \fi
  128.  \ifcmmibloaded@
  129.   \textfont\cmmibfam=\eightcmmib \scriptfont\cmmibfam=\sixcmmib
  130.    \scriptscriptfont\cmmibfam=\fivecmmib
  131.  \fi
  132.  \ifcmbsyloaded@
  133.   \textfont\cmbsyfam=\eightcmbsy \scriptfont\cmbsyfam=\sixcmbsy
  134.    \scriptscriptfont\cmbsyfam=\fivecmbsy
  135.  \fi
  136.  \let\tt\eighttt
  137.  \tt\ttglue@.4emminus.12em
  138.  \setbox\strutbox\hbox{\vrule\height7\p@\depth3\p@\width\z@}%
  139.  \setbox\strutbox@\hbox{\vrule\height6.5\p@\depth2.5\p@\width\z@}%
  140.  \ex@=.2326ex\normalbaselines\ifmmode\else\rm\fi}
  141.  
  142. \def\eightbig@#1{{\hbox{$\textfont\z@\ninerm\textfont\tw@\ninesy
  143.  \left#1\vbox to6.5\p@{}\right.\n@space$}}}
  144.  
  145. {\catcode` =\active
  146. \gdef\litcodes@@{\def {\penalty\z@\hskip\ttglue@}}}
  147.  
  148. \def\LamSTeX{L\kern-.4em\raise.3ex\hbox{$\ssize\Cal A$}%
  149.  \DN@{10}\ifx\next@\pointsize@\kern-.25em\else\kern-.3em\fi
  150.  \lower.4ex\hbox{\DN@{10}\ifx\next@\pointsize@\eightsy\else\sixsy\fi M}%
  151.  \kern-.1em{$\Cal S$}-\TeX}
  152.  
  153. \def\alloc@#1#2#3#4#5{\global\advance\count1#1by\@ne
  154.  \ch@ck#1#4#2\allocationnumber=\count1#1
  155.  \global#3#5=\allocationnumber
  156.  \wlog{\string#5=\string#2\the\allocationnumber}}
  157.  
  158. \catcode`\@=13
  159.  
  160. \eightpoint
  161. \def\opentables{\HD(9pt;2pt)}
  162. \def\boxedtables{\HD(+3pt;+2pt)}
  163.